﻿Write-Host "作用：收集所有名称带中划线（-）的文件夹名称到 Result.txt 文本文档中"
Read-Host "按 Enter 键开始"

# 记录开始时间
$startTime = Get-Date

# 输出文件
$outputFile = Join-Path $PSScriptRoot "Result.txt"

# 初始化计数
$count = 0

# 删除已有的 Result.txt 文件（如果存在）
if (Test-Path $outputFile) {
    Remove-Item $outputFile
}

# 遍历当前目录及所有子目录下的文件夹
Get-ChildItem -Directory -Recurse | ForEach-Object {
    $folderName = $_.Name

    # 使用正则匹配名称中带中划线的文件夹
    if ($folderName -match "^[^ ].*-[^ ].*$") {
        # 写入到 Result.txt
        Add-Content -Path $outputFile -Value $folderName
        # 更新计数
        $count++
    }
}

# 记录结束时间并计算耗时（秒）
$endTime = Get-Date
$elapsed = ($endTime - $startTime).TotalSeconds

Write-Host "处理完成，总计收集数：$count（耗时 $([math]::Round($elapsed, 3)) 秒）"
Read-Host "按 Enter 键关闭"